frmtest Call status box Form1 Command1 Timer1 Command2 Form_Click Form_Load WindowState ScaleWidthu Timer1_Timer ScaleHeight, Minimize+ Height CaptionU Form_Paint< Form_DragDrop( Source4 Form_Resize] Margin CurrentX CurrentYU IconBar Minimized InitIcon IconInit thenCall2 IconPie CenterX CenterY Radius Start EndPt AngStart# AngEnd Form_MouseDown} Buttond Shifts FillColor FillStyle IconInitBar IconInitPie Offset ArcAmount TextColor ForeColor IconPie2 Command1_Click Command2_Clickf Command3_Click IconInitPie2J IconTypeZ IPie> IPie2 Timer1 Interval Enabled False Command4_ClickF Maximized NORMAL Form1 Command1 Visible Command2 Command3 Command4 thenCaptionk elsif frmStat txtBarPct frmTest* txtPicPct8 txtPie1Pct txtPie2Pct IPie1| printer status demonstration Click Dummy Command1_Click Icon Bar Chart Command2_Click Timer1_Timer